home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / rename10 / global.bas < prev    next >
Encoding:
BASIC Source File  |  1995-05-09  |  409 b   |  11 lines
  1. Declare Sub WriteProfileString Lib "Kernel" (ByVal AppName$, ByVal KeyName$, ByVal KeyStr$)
  2. Declare Function GetProfileInt% Lib "Kernel" (ByVal AppName$, ByVal KeyName$, ByVal DefaultVal%)
  3. ' KeyCode (KeyDown, KeyUp)
  4.  
  5. Global Const KEY_F1 = &H70
  6.  
  7. Function CopyFile (ByVal SourcePath As String, ByVal DestinationPath As String, ByVal SrcFilename As String, ByVal DestFileName As String)
  8.  
  9. End Function
  10.  
  11.